PC Gamer (Italian) 36/PC Gamer IT CD 36 2-2.iso/VIGDEMO/data1.cab/Assets/scripts/keycard.e

Text File | 1998-09-21 | 2KB | 528 lines

int Initialize(string type)
{
    global int state ;
    global real repeatTime = .3;
    global int gGravity = 0;
    Reset("dumy");
    return 0;

}

int Reset(string dummy)
{
    state = 0;
    SetCollidableProperties(thisObject,gGravity,0);
    SetStyle(thisObject,2);

    SetScale(thisObject,2.0);

    wakeupTime = -1.0;
    return 0;
}


int gravity(string flag)
{
    int value;
    value = Str2Int(flag);

    gGravity = value;
    SetCollidableProperties(thisObject,gGravity,0);
}

int Colliders(string dummy)
{

    map::iterator ix;
    map objInList;
    int value;

    objInList = Collisions(thisObject,0,1,0);

    for (ix = begin(objInList) ;ix != end(objInList); ++ix)
    {
        value = AddObjectTo(first(dereference(ix)),thisObject);
        if (value != 0)
        {
            PlaySound(thisObject,35);
            SetScale(thisObject,1.0);
            break;
        }
    }

    return 0;
}


int Launch(string dummy)
{
    SetScale(thisObject,2.0);
}

int Drop(string dummy)
{
    int returnBullet;
    Launch(dummy);
    SetCollidableProperties(thisObject,gGravity,0);
    SetStyle(thisObject,2);
    PlaySound(thisObject,38);

    ReturnValue(thisObject,0);
}

int Pickup(string dummy)
{
    ReturnValue(thisObject,0);
}

int Holster(string dummy)
{
    ReturnValue(thisObject,0);
}